object frmManMovimentacaoEstoque: TfrmManMovimentacaoEstoque
  Left = 56
  Top = 168
  BorderStyle = bsDialog
  Caption = 'Movimenta'#231#227'o de Estoque'
  ClientHeight = 484
  ClientWidth = 1086
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clGreen
  Font.Height = -11
  Font.Name = 'Verdana'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel4: TPanel
    Left = 0
    Top = 75
    Width = 989
    Height = 409
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 2
      Top = 2
      Width = 985
      Height = 405
      Align = alClient
      Ctl3D = False
      DataSource = DS_Grid
      Font.Charset = ANSI_CHARSET
      Font.Color = clGreen
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clGreen
      TitleFont.Height = -11
      TitleFont.Name = 'Verdana'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'data'
          Title.Caption = 'Data Movimenta'#231#227'o'
          Width = 139
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'sDsMaterial'
          Title.Caption = 'Material'
          Width = 332
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'sCor'
          Title.Caption = 'Cor'
          Width = 151
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'sLargura'
          Title.Caption = 'Largura'
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'sEspessura'
          Title.Caption = 'Espessura'
          Width = 68
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'quantidade'
          Title.Caption = 'Quantidade (M)'
          Width = 92
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'sOperacao'
          Title.Caption = 'Opera'#231#227'o'
          Width = 100
          Visible = True
        end>
    end
  end
  object Panel2: TPanel
    Left = 989
    Top = 75
    Width = 97
    Height = 409
    Align = alRight
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 1
    object btnFechar: TSpeedButton
      Left = 3
      Top = 364
      Width = 91
      Height = 41
      Caption = 'Fechar'
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F3333000000000003333377777777777333}
      Layout = blGlyphTop
      NumGlyphs = 2
      ParentFont = False
      OnClick = btnFecharClick
    end
    object btnIncluir: TSpeedButton
      Left = 3
      Top = 3
      Width = 91
      Height = 41
      Caption = 'Nova Opera'#231#227'o'
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333300333
        33333333333773FF333333333330F0033333333333373773FF333333330FFFF0
        03333333337F333773FF3333330FFFFFF003333333733FF33773333330FF00FF
        FF80333337F3773F3337333330FFFF0FFFF03FFFF7FFF3733F3700000000FFFF
        0FF0777777773FF373370000000000FFFFF07FFFFFF377FFF3370CCCCC000000
        FF037777773337773F7300CCC000003300307F77733337F37737000C00000033
        33307F373333F7F333370000007B703333307FFFF337F7F33337099900BBB033
        33307777F37777FF33370999007B700333037777F3373773FF73099900000030
        00337777FFFFF7F7773300000000003333337777777777333333}
      Layout = blGlyphTop
      NumGlyphs = 2
      ParentFont = False
      OnClick = btnIncluirClick
    end
    object Bevel1: TBevel
      Left = -7
      Top = 359
      Width = 116
      Height = 2
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 1086
    Height = 75
    Align = alTop
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 2
    object Label2: TLabel
      Left = 9
      Top = 12
      Width = 45
      Height = 13
      Caption = 'C'#243'digo:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = []
      ParentFont = False
    end
    object btnPesquisa: TSpeedButton
      Left = 587
      Top = 7
      Width = 81
      Height = 49
      Caption = 'Pesquisar'
      Flat = True
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33033333333333333F7F3333333333333000333333333333F777333333333333
        000333333333333F777333333333333000333333333333F77733333333333300
        033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
        33333377333777733333307F8F8F7033333337F333F337F3333377F8F9F8F773
        3333373337F3373F3333078F898F870333337F33F7FFF37F333307F99999F703
        33337F377777337F3333078F898F8703333373F337F33373333377F8F9F8F773
        333337F3373337F33333307F8F8F70333333373FF333F7333333330777770333
        333333773FF77333333333370007333333333333777333333333}
      Layout = blGlyphTop
      NumGlyphs = 2
      ParentFont = False
      OnClick = btnPesquisaClick
    end
    object Label1: TLabel
      Left = 190
      Top = 10
      Width = 50
      Height = 13
      Caption = 'Material:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 11
      Top = 40
      Width = 87
      Height = 13
      Caption = 'Movimenta'#231#227'o:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 248
      Top = 41
      Width = 70
      Height = 13
      Caption = 'Data Inicial:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 423
      Top = 41
      Width = 60
      Height = 13
      Caption = 'Data final:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Verdana'
      Font.Style = []
      ParentFont = False
    end
    object edtCodigo: TEdit
      Left = 62
      Top = 8
      Width = 114
      Height = 19
      Ctl3D = False
      ParentCtl3D = False
      TabOrder = 0
    end
    object dblMaterial: TDBLookupComboBox
      Left = 248
      Top = 8
      Width = 321
      Height = 19
      Ctl3D = False
      KeyField = 'cd_material'
      ListField = 'descricao'
      ListSource = DS_Material
      ParentCtl3D = False
      TabOrder = 1
    end
    object rbTodas: TRadioButton
      Left = 11
      Top = 51
      Width = 52
      Height = 17
      Caption = 'Todas'
      Checked = True
      TabOrder = 2
      TabStop = True
    end
    object rbEntrada: TRadioButton
      Left = 73
      Top = 52
      Width = 62
      Height = 17
      Caption = 'Entrada'
      TabOrder = 3
    end
    object rbSaida: TRadioButton
      Left = 138
      Top = 52
      Width = 62
      Height = 17
      Caption = 'Sa'#237'da'
      TabOrder = 4
    end
    object edtDtFinal: TMaskEdit
      Left = 487
      Top = 37
      Width = 83
      Height = 19
      Ctl3D = False
      EditMask = '!99/99/9999;1;_'
      MaxLength = 10
      ParentCtl3D = False
      TabOrder = 6
      Text = '  /  /    '
    end
    object edtDtInicial: TMaskEdit
      Left = 323
      Top = 37
      Width = 83
      Height = 19
      Ctl3D = False
      EditMask = '!99/99/9999;1;_'
      MaxLength = 10
      ParentCtl3D = False
      TabOrder = 5
      Text = '  /  /    '
    end
  end
  object DS_Grid: TDataSource
    DataSet = QR_Grid
    Left = 640
    Top = 193
  end
  object QR_Grid: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    OnCalcFields = QR_GridCalcFields
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_MOVIMENTACAO_ESTOQUE'
      'ORDER BY DATA')
    Left = 640
    Top = 249
    object QR_Gridcd_movimentacao: TAutoIncField
      FieldName = 'cd_movimentacao'
      ReadOnly = True
    end
    object QR_Gridoperacao: TWideStringField
      FieldName = 'operacao'
      Size = 1
    end
    object QR_Gridcd_material: TIntegerField
      FieldName = 'cd_material'
    end
    object QR_Gridcd_usuario: TIntegerField
      FieldName = 'cd_usuario'
    end
    object QR_GridsDsMaterial: TStringField
      FieldKind = fkLookup
      FieldName = 'sDsMaterial'
      LookupDataSet = QR_MaterialGrid
      LookupKeyFields = 'cd_material'
      LookupResultField = 'descricao'
      KeyFields = 'cd_material'
      Size = 100
      Lookup = True
    end
    object QR_GridsOperacao: TStringField
      FieldKind = fkCalculated
      FieldName = 'sOperacao'
      Calculated = True
    end
    object QR_Griddata: TWideStringField
      FieldName = 'data'
      Size = 50
    end
    object QR_GridsCor: TStringField
      FieldKind = fkLookup
      FieldName = 'sCor'
      LookupDataSet = QR_Material
      LookupKeyFields = 'cd_material'
      LookupResultField = 'cor'
      KeyFields = 'cd_material'
      Lookup = True
    end
    object QR_GridsLargura: TStringField
      FieldKind = fkLookup
      FieldName = 'sLargura'
      LookupDataSet = QR_Material
      LookupKeyFields = 'cd_material'
      LookupResultField = 'nr_largura'
      KeyFields = 'cd_material'
      Lookup = True
    end
    object QR_GridsEspessura: TStringField
      FieldKind = fkLookup
      FieldName = 'sEspessura'
      LookupDataSet = QR_Material
      LookupKeyFields = 'cd_material'
      LookupResultField = 'nr_espessura'
      KeyFields = 'cd_material'
      Lookup = True
    end
    object QR_Gridquantidade: TBCDField
      FieldName = 'quantidade'
      DisplayFormat = '0.00'
      EditFormat = '0.00'
      Precision = 18
      Size = 2
    end
  end
  object QR_Material: TADOQuery
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_MATERIAL'
      'ORDER BY DESCRICAO')
    Left = 560
    Top = 249
  end
  object DS_Material: TDataSource
    DataSet = QR_Material
    Left = 560
    Top = 193
  end
  object DS_MaterialGrid: TDataSource
    DataSet = QR_MaterialGrid
    Left = 472
    Top = 193
  end
  object QR_MaterialGrid: TADOQuery
    Active = True
    Connection = dtmSisnnovi.connSisnnovi
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT * FROM TB_MATERIAL')
    Left = 472
    Top = 249
  end
end
